(rmail-convert-to-babyl-format):

Fix one-off error in handling content-length field.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index fcda6eb0ec5639d824c7d3343f0da7b1558c3764..d852b73586f72dc86763b475be1199df86ffa537 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -896,7 +896,7 @@ argument causes us to read a file name and use that file as the inbox."
               ;; skip to the end of the contents.
               (let* ((header-end (save-excursion
                                    (and (re-search-forward "\n\n" nil t)
-                                        (point))))
+                                        (1- (point)))))
                      (case-fold-search t)
                      (size
                       ;; Get the numeric value from the Content-Length field.